home *** CD-ROM | disk | FTP | other *** search
/ CU Amiga Super CD-ROM 23 / CU Amiga - Super CD-ROM 23 (June 1998).iso / CreatingGames / Utilities / E / eaudio / eaudio_demo.e < prev    next >
Encoding:
Text File  |  1997-11-01  |  505 b   |  29 lines
  1. /* E-Audio demo
  2.    By Peter Gordon
  3.  
  4.    This is pish!!
  5.    
  6.    To test it out, just compile this and type:
  7.    
  8.    eaudio <filename>
  9.    
  10.    And any mousebutton exits :)
  11.    
  12.    Byee!
  13. */
  14.  
  15. MODULE  '*eaudio'
  16.  
  17. PROC main()
  18.   DEF sample,samplen
  19.   sample, samplen:=loadRaw(arg)
  20.   IF(sample)
  21.     playData(sample,samplen,13964,CHAN_LEFT2+CHAN_RIGHT1,64)
  22.     WaitTOF()
  23.     exitLoop(CHAN_LEFT2+CHAN_RIGHT1)
  24.     REPEAT;UNTIL Mouse()
  25.     stopChannels(CHAN_LEFT2+CHAN_RIGHT1+CHAN_LEFT1)
  26.     Dispose(sample)
  27.   ENDIF
  28. ENDPROC
  29.